      ***********************************************************
      *     This file was generated by AGT Decompiler v1.0
      ***********************************************************

COMMAND ANY 
   NewLife 
   TurnCounterON  5
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocation  2  <--Ship's Cabin
   IsOpen  206  <--CABIN DOOR
   ChangePassageway  3  <--EAST, Short corridor
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocationLT  9  <--The Sea
   CounterGT  5 25
   GoToRoom  7  <--Sinking Ship
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND ANY 
   AtLocationGT  8  <--Foredeck
   AtLocationLT  14  <--Land
   TurnsEquals  26
   PrintMessage  1
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   FlagOFF  4
   CounterGT  4 30
   TurnFlagON  4
   TurnCounterOFF  4
   SendToRoom  212 15  <--THICK PLANK, Spit of Sand
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   FlagOFF  5
   CounterGT  4 15
   TurnFlagON  5
   SendToRoom  213 15  <--BATTERED SWORD, Spit of Sand
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocationGT  8  <--Foredeck
   AtLocationLT  14  <--Land
   IsWearing  209  <--CHAIN MAIL
   NOT IsCarrying  201  <--EMPTY KEG
   PrintMessage  2
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND ANY 
   AtLocationGT  8  <--Foredeck
   AtLocationLT  14  <--Land
   LoadWeightLT  20
   NOT IsCarrying  201  <--EMPTY KEG
   Chance  10
   PrintMessage  3
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND ANY 
   AtLocationGT  8  <--Foredeck
   AtLocationLT  14  <--Land
   LoadWeightGT  19
   NOT IsCarrying  201  <--EMPTY KEG
   PrintMessage  4
   Chance  25
   PrintMessage  3
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND ANY 
   AtLocationGT  8  <--Foredeck
   AtLocationLT  14  <--Land
   LoadWeightGT  19
   IsCarrying  201  <--EMPTY KEG
   PrintMessage  5
   Chance  15
   PrintMessage  3
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND ANY 
   AtLocation  12  <--Still More Sea
   IsCarrying  210  <--LONG SWORD
   PrintMessage  6
   Destroy  210  <--LONG SWORD
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocationGT  8  <--Foredeck
   AtLocationLT  14  <--Land
   FlagOFF  3
   Chance  20
   PutInCurrentRoom  301  <--MAN-EATING SHARK
   PrintMessage  7
   TurnFlagON  3
   TurnCounterON  2
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocationGT  8  <--Foredeck
   AtLocationLT  14  <--Land
   FlagON  3
   CounterGT  2 6
   Chance  20
   PutInCurrentRoom  301  <--MAN-EATING SHARK
   PrintMessage  7
   TurnCounterOFF  2
   TurnCounterON  2
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocation  14  <--Land
   TurnCounterON  4
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocationGT  14  <--Land
   AtLocationLT  29  <--Caliban's Lair
   NOT Present  303  <--BEAUTIFUL GIRL
   NOT Present  302  <--FLYING FIGURE
   Chance  20
   PutInCurrentRoom  303  <--BEAUTIFUL GIRL
   PrintMessage  8
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocationGT  14  <--Land
   Present  302  <--FLYING FIGURE
   Chance  25
   SendToRoom  302 0  <--FLYING FIGURE, 
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocationGT  14  <--Land
   AtLocationLT  29  <--Caliban's Lair
   NOT Present  302  <--FLYING FIGURE
   NOT Present  303  <--BEAUTIFUL GIRL
   Chance  20
   PutInCurrentRoom  302  <--FLYING FIGURE
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   AtLocationGT  28  <--South of Quicksand
   AtLocationLT  37  <--Prospero's Cell
   NOT Present  304  <--UGLY BRUTE
   Chance  25
   PutInCurrentRoom  304  <--UGLY BRUTE
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   Present  219  <--BURNING TWIGS
   CounterGT  1 30
   PrintMessage  9
   CounterGT  1 35
   PrintMessage  10
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   CounterGT  1 35
   SwapLocations  214 219  <--UNBURNT TWIGS, BURNING TWIGS
   TurnCounterOFF  1
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   IsCarrying  256  <--WILD FLOWERS
   CounterGT  3 10
   PrintMessage  11
   CounterGT  3 15
   SendToRoom  256 55  <--WILD FLOWERS, Field of Flowers
   GetIt  257  <--WILTED FLOWERS
   MinusScore  20
   TurnCounterOFF  3
   QuitThisCMD 
END_COMMAND

COMMAND ANY 
   FlagOFF  6
   AtLocationGT  38  <--A Secret Room
   AtLocationLT  47  <--Chap. 9: To Instill Love in a 
   NOT AtLocation  43  <--Chap. 5: To Fly to Greate Heig
   VerbIsDirection 
   NOT Present  306  <--GHASTLY APPARITION
   PrintMessage  12
   GoToRandomRoom  39 46  <--Chap. 1: To Raise Greate Tempe, Chap. 8: To Discovere Secrets
   DoneWithTurn 
END_COMMAND

COMMAND ANY 
   AtLocation  51  <--Upper Slope
   OR 
   AtLocationGT  51  <--Upper Slope
   AddToVariable  1 1
   VariableGT  1 6
   PrintMessage  13
   VariableGT  1 10
   PrintMessage  14
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND ANY 
   AtLocation  36  <--Mountain Slope
   OR 
   AtLocation  37  <--Prospero's Cell
   SetVariableTo  1 0
   QuitThisCMD 
END_COMMAND

COMMAND DROP ANY 
   NOT NOUNIsNumber  201
   AtLocationGT  8  <--Foredeck
   AtLocationLT  14  <--Land
   DestroyNOUN 
   PrintMessage  15
   DoneWithTurn 
END_COMMAND

COMMAND PULL TAPESTRY 
   Present  229  <--GORGEOUS TAPESTRY
   ChangePassageway  1  <-- Inventory,   <--NORTH, A Secret Room
   PrintMessage  16
   DoneWithTurn 
END_COMMAND

COMMAND GIVE ANY 
   IsCarrying  258  <--ENCHANTED FLOWERS
   NOUNIsNumber  258
   ObjectIsNumber  303
   PrintMessage  17
   PlusScore  500
   WinGame 
   DoneWithTurn 
END_COMMAND

COMMAND GIVE ANY 
   NOUNIsCarrying 
   ObjectIsCreature 
   PrintMessage  18
   DoneWithTurn 
END_COMMAND

COMMAND EMPTY KEG 
   IsCarrying  200  <--WINE KEG
   IsOpen  200  <--WINE KEG
   IsCarrying  202  <--RED WINE
   PrintMessage  19
   Destroy  202  <--RED WINE
   SwapLocations  200 201  <--WINE KEG, EMPTY KEG
   PlusScore  20
   DoneWithTurn 
END_COMMAND

COMMAND EMPTY WINE 
   ReDirectTo 
   QuitThisCMD 
END_COMMAND

COMMAND none KEG 
   QuitThisCMD 
END_COMMAND

COMMAND DRINK WINE 
   IsCarrying  202  <--RED WINE
   GoToRoom  6  <--Drunken Stupor
   DoneWithTurn 
END_COMMAND

COMMAND EMPTY VIAL 
   IsCarrying  246  <--BLUE-GREEN VIAL
   IsOpen  246  <--BLUE-GREEN VIAL
   IsCarrying  247  <--PURPLE FLUID
   PrintMessage  20
   SwapLocations  247 248  <--PURPLE FLUID, TINY KEY
   PlusScore  20
   DoneWithTurn 
END_COMMAND

COMMAND SPEAK ANY 
   ReDirectTo 
   QuitThisCMD 
END_COMMAND

COMMAND TELL NOUN 
   QuitThisCMD 
END_COMMAND

COMMAND TELL CAPTAIN 
   AtLocation  8  <--Foredeck
   Present  300  <--SHIP'S CAPTAIN
   DescribeThing  300  <--SHIP'S CAPTAIN
   DoneWithTurn 
END_COMMAND

COMMAND TELL FIGURE 
   Present  302  <--FLYING FIGURE
   FlagOFF  1
   PrintMessage  21
   TurnFlagON  1
   PlusScore  10
   DoneWithTurn 
END_COMMAND

COMMAND TELL FIGURE 
   Present  302  <--FLYING FIGURE
   FlagON  1
   PrintMessage  22
   DoneWithTurn 
END_COMMAND

COMMAND TELL GIRL 
   Present  303  <--BEAUTIFUL GIRL
   Chance  25
   PlusScore  40
   PrintMessage  23
   DoneWithTurn 
END_COMMAND

COMMAND TELL GIRL 
   Present  303  <--BEAUTIFUL GIRL
   PrintMessage  24
   DoneWithTurn 
END_COMMAND

COMMAND TELL BRUTE 
   Present  304  <--UGLY BRUTE
   DescribeThing  304  <--UGLY BRUTE
   DoneWithTurn 
END_COMMAND

COMMAND ATTACK GIRL 
   ReDirectTo 
   QuitThisCMD 
END_COMMAND

COMMAND none GIRL 
   QuitThisCMD 
END_COMMAND

COMMAND ATTACK SHARK IN SWORD
   Present  301  <--MAN-EATING SHARK
   IsCarrying  210  <--LONG SWORD
   PrintMessage  25
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND ATTACK ANY IN SWORD
   IsCarrying  210  <--LONG SWORD
   OR 
   IsCarrying  213  <--BATTERED SWORD
   NOUNPresent 
   NOT NOUNIsNumber  302
   NOT NOUNIsNumber  306
   PrintMessage  26
   DestroyNOUN 
   DoneWithTurn 
END_COMMAND

COMMAND ATTACK ANY IN SWORD
   NOUNPresent 
   IsCarrying  213  <--BATTERED SWORD
   PrintMessage  27
   DoneWithTurn 
END_COMMAND

COMMAND CUT VINES 
   AtLocation  23  <--Tangle of Vines
   Present  215  <--GREEN VINES
   NOT IsCarrying  213  <--BATTERED SWORD
   PrintMessage  28
   DoneWithTurn 
END_COMMAND

COMMAND CUT VINES IN SWORD
   AtLocation  23  <--Tangle of Vines
   Present  215  <--GREEN VINES
   IsCarrying  213  <--BATTERED SWORD
   PrintMessage  29
   SwapLocations  215 216  <--GREEN VINES, LOOSE VINES
   PlusScore  10
   DoneWithTurn 
END_COMMAND

COMMAND NORTH ANY 
   AtLocation  27  <--Deadly quicksand
   Destroy  220  <--GREEN GRASS
   SendToRoom  221 26  <--TREACHEROUS QUICKSAND, Small Green Clearing
   SendToRoom  222 1  <--SLOPPY MUCK, 
   LoadWeightGT  100
   DropEverything 
   PrintMessage  6
   SendToRoom  222 1  <--SLOPPY MUCK, 
   QuitThisCMD 
END_COMMAND

COMMAND PUT ANY 
   NOT  NOUNIsCarrying 
   PrintMessage  30
   DoneWithTurn 
END_COMMAND

COMMAND PUT ANY IN GRASS
   ReDirectTo 
   QuitThisCMD 
END_COMMAND

COMMAND PUT NOUN IN QUICKSAND
   QuitThisCMD 
END_COMMAND

COMMAND PUT CONTRAPTION IN QUICKSAND
   FlagON  2
   IsCarrying  223  <--MAKESHIFT CONTRAPTION
   AtLocation  26  <--Small Green Clearing
   Present  221  <--TREACHEROUS QUICKSAND
   SendToRoom  223 221  <--MAKESHIFT CONTRAPTION, TREACHEROUS QUICKSAND
   PrintMessage  31
   ChangePassageway  2   <--SOUTH, South of Quicksand
   DoneWithTurn 
END_COMMAND

COMMAND PUT CONTRAPTION IN QUICKSAND
   FlagON  2
   IsCarrying  223  <--MAKESHIFT CONTRAPTION
   AtLocation  26  <--Small Green Clearing
   NOT Present  221  <--TREACHEROUS QUICKSAND
   SwapLocations  221 220  <--TREACHEROUS QUICKSAND, GREEN GRASS
   SendToRoom  223 221  <--MAKESHIFT CONTRAPTION, TREACHEROUS QUICKSAND
   PrintMessage  32
   ChangePassageway  2   <--SOUTH, South of Quicksand
   DoneWithTurn 
END_COMMAND

COMMAND PUT KEG IN QUICKSAND
   AtLocation  26  <--Small Green Clearing
   NOUNIsNumber  201
   IsCarrying  201  <--EMPTY KEG
   SendToRoom  221 26  <--TREACHEROUS QUICKSAND, Small Green Clearing
   Destroy  220  <--GREEN GRASS
   SendToRoom  201 221  <--EMPTY KEG, TREACHEROUS QUICKSAND
   PrintMessage  33
   DoneWithTurn 
END_COMMAND

COMMAND PUT ANY IN QUICKSAND
   SendToRoom  221 26  <--TREACHEROUS QUICKSAND, Small Green Clearing
   Destroy  220  <--GREEN GRASS
   SendNOUNToRoom  221
   PrintMessage  34
   DoneWithTurn 
END_COMMAND

COMMAND PUT TWIGS IN FIRE
   IsCarrying  214  <--UNBURNT TWIGS
   SendToRoom  214 0  <--UNBURNT TWIGS, 
   SendToRoom  219 217  <--BURNING TWIGS, SMOULDERING FIRE
   PrintMessage  35
   TurnCounterON  1
   DoneWithTurn 
END_COMMAND

COMMAND PUT ANY IN RETORT
   Present  238  <--GLASS RETORT
   IsOpen  238  <--GLASS RETORT
   NOUNIsCarrying 
   NOUNIsNumber  232
   Present  239  <--OIL BURNER
   IsOn  239  <--OIL BURNER
   Destroy  232  <--LEADEN KEY
   SendToRoom  244 238  <--GOLDEN KEY, GLASS RETORT
   PrintMessage  36
   DoneWithTurn 
END_COMMAND

COMMAND PUT ANY IN RETORT
   Present  238  <--GLASS RETORT
   IsOpen  238  <--GLASS RETORT
   NOUNIsCarrying 
   Present  239  <--OIL BURNER
   IsOff  239  <--OIL BURNER
   SendNOUNToRoom  238
   PrintMessage  37
   DoneWithTurn 
END_COMMAND

COMMAND PUT ANY IN RETORT
   Present  238  <--GLASS RETORT
   IsOpen  238  <--GLASS RETORT
   NOUNIsCarrying 
   DestroyNOUN 
   PrintMessage  38
   DoneWithTurn 
END_COMMAND

COMMAND TIE ANY 
   NOT Present  212  <--THICK PLANK
   PrintMessage  39
   DoneWithTurn 
END_COMMAND

COMMAND TIE ANY 
   NOT IsCarrying  216  <--LOOSE VINES
   PrintMessage  40
   DoneWithTurn 
END_COMMAND

COMMAND TIE ANY IN PLANK
   Present  212  <--THICK PLANK
   NOUNIsCarrying 
   PrintMessage  41
   PutInCurrentRoom  223  <--MAKESHIFT CONTRAPTION
   SendNOUNToRoom  223
   SendToRoom  212 223  <--THICK PLANK, MAKESHIFT CONTRAPTION
   SendToRoom  216 223  <--LOOSE VINES, MAKESHIFT CONTRAPTION
   CloseIt  223  <--MAKESHIFT CONTRAPTION
   SendToRoom  223 1  <--MAKESHIFT CONTRAPTION, 
   IsLocated  201 223  <--EMPTY KEG, MAKESHIFT CONTRAPTION
   TurnFlagON  2
   DoneWithTurn 
END_COMMAND

COMMAND OPEN CONTRAPTION 
   Present  223  <--MAKESHIFT CONTRAPTION
   OpenIt  223  <--MAKESHIFT CONTRAPTION
   PrintMessage  42
   RelocateAll  223 1  <--MAKESHIFT CONTRAPTION, Inventory
   PutInCurrentRoom  212  <--THICK PLANK
   Destroy  223  <--MAKESHIFT CONTRAPTION
   DoneWithTurn 
END_COMMAND

COMMAND RAVISH GIRL 
   Present  303  <--BEAUTIFUL GIRL
   PrintMessage  43
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND ATTACK GIRL 
   ReDirectTo 
   QuitThisCMD 
END_COMMAND

COMMAND none GIRL 
   QuitThisCMD 
END_COMMAND

COMMAND GET GIRL 
   Present  303  <--BEAUTIFUL GIRL
   PrintMessage  44
   DoneWithTurn 
END_COMMAND

COMMAND GET FLOWERS 
   Present  256  <--WILD FLOWERS
   TurnCounterON  3
   QuitThisCMD 
END_COMMAND

COMMAND GET CONTRAPTION 
   FlagON  2
   Present  223  <--MAKESHIFT CONTRAPTION
   IsLocated  223 221  <--MAKESHIFT CONTRAPTION, TREACHEROUS QUICKSAND
   PrintMessage  45
   DoneWithTurn 
END_COMMAND

COMMAND PUSH HEAD 
   Present  255  <--DRAGON'S HEAD
   IsWearing  226  <--BLACK GLOVES
   PrintMessage  46
   UnlockIt  254  <--HEAVY WOODEN DOOR
   OpenIt  254  <--HEAVY WOODEN DOOR
   ChangePassageway  3  <--EAST, Prospero's Cell
   ChangePassageway  11  <--ENTER, Prospero's Cell
   DoneWithTurn 
END_COMMAND

COMMAND PUSH HEAD 
   Present  255  <--DRAGON'S HEAD
   NOT IsWearing  226  <--BLACK GLOVES
   PrintMessage  47
   KillPlayer 
   DoneWithTurn 
END_COMMAND

COMMAND EXAMINE DRAWER 
   NOUNPresent 
   NOUNIsOpen 
   NOUNIsNumber  241
   ShowContents  241
   DoneWithTurn 
END_COMMAND

COMMAND EXAMINE DRAWER 
   NOUNPresent 
   NOUNIsOpen 
   NOUNIsNumber  242
   ShowContents  242
   DoneWithTurn 
END_COMMAND

COMMAND EXAMINE DRAWER 
   NOUNPresent 
   NOUNIsOpen 
   NOUNIsNumber  243
   ShowContents  243
   DoneWithTurn 
END_COMMAND

COMMAND EXAMINE GLOBE 
   Present  233  <--CRYSTAL GLOBE
   PrintMessage  48
   RandomMessage  49 51
   DoneWithTurn 
END_COMMAND

COMMAND EXTINGUISH TWIGS 
   IsCarrying  219  <--BURNING TWIGS
   TurnCounterOFF  1
   SwapLocations  219 214  <--BURNING TWIGS, UNBURNT TWIGS
   PrintMessage  52
   DoneWithTurn 
END_COMMAND

COMMAND OPEN DRAWER 
   NOUNPresent 
   NOUNIsClosed 
   NOUNIsUnlocked 
   OpenNOUN 
   PrintMessage  53
   ReDirectTo 
   QuitThisCMD 
END_COMMAND

COMMAND EXAMINE DRAWER 
   QuitThisCMD 
END_COMMAND

COMMAND UNLOCK BOOK IN KEY
   NOUNPresent 
   NOUNIsNumber  235
   ObjectIsNumber  248
   IsCarrying  248  <--TINY KEY
   SwapLocations  235 236  <--HUGE BOOK, MAGIC BOOK
   PrintMessage  54
   DoneWithTurn 
END_COMMAND

COMMAND OPEN BOOK IN KEY
   NOUNPresent 
   NOUNIsNumber  235
   ObjectIsNumber  248
   ReDirectTo 
   QuitThisCMD 
END_COMMAND

COMMAND UNLOCK BOOK IN KEY
   QuitThisCMD 
END_COMMAND

COMMAND READ BOOK 
   NOUNPresent 
   NOUNIsNumber  236
   PrintMessage  55
   GoToRoom  39  <--Chap. 1: To Raise Greate Tempe
   DoneWithTurn 
END_COMMAND

COMMAND READ LETTERS 
   FlagOFF  6
   NOUNPresent 
   TurnFlagON  6
   QuitThisCMD 
END_COMMAND

COMMAND THROW OBJECT 
   IsCarrying  251  <--PULSATING RED OBJECT
   NOUNIsNumber  251
   ObjectIsNumber  256
   Present  256  <--WILD FLOWERS
   SwapLocations  256 258  <--WILD FLOWERS, ENCHANTED FLOWERS
   PrintMessage  56
   DoneWithTurn 
END_COMMAND

COMMAND THROW ANY 
   NOT NOUNIsNumber  211
   NOT NOUNIsNumber  245
   NOUNIsCarrying 
   DropNOUN 
   PrintMessage  57
   DoneWithTurn 
END_COMMAND

